theme(plot.subtitle = element_text(color = '#FA4616', family = "Libre Franklin", face="bold", size=14, vjust=2))+
theme(plot.caption = element_text (color = "gray60", family = "Libre Franklin", face = 'bold', hjust=1))+
theme(plot.background = element_rect(fill='gray96', colour =NA))+
theme(legend.position = 'none')
ggplotly(interactive_map, tooltip = 'text') %>%
config(displayModeBar = FALSE)
```